object Form1: TForm1 Left = 302 Top = 96 BorderIcons = [] BorderStyle = bsNone Caption = 'DiskFree 1.0' ClientHeight = 297 ClientWidth = 265 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] FormStyle = fsStayOnTop PopupMenu = PopupMenu1 OnCreate = FormCreate OnDestroy = FormDestroy OnShow = FormShow PixelsPerInch = 96 TextHeight = 13 object Panel1: TPanel Left = 0 Top = 0 Width = 265 Height = 297 BevelInner = bvRaised TabOrder = 0 object Panel3: TPanel Left = 8 Top = 8 Width = 249 Height = 49 TabOrder = 0 object Label6: TLabel Left = 48 Top = 6 Width = 73 Height = 13 Caption = 'DiskFree 1.0' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False end object Image1: TImage Left = 8 Top = 6 Width = 32 Height = 32 AutoSize = True Picture.Data = {} Stretch = True end object Memo1: TMemo Left = 48 Top = 20 Width = 193 Height = 27 BorderStyle = bsNone Color = clBtnFace Ctl3D = True Enabled = False ParentCtl3D = False TabOrder = 0 end end object Panel2: TPanel Left = 8 Top = 64 Width = 249 Height = 225 TabOrder = 1 object Label1: TLabel Left = 176 Top = 8 Width = 62 Height = 16 Caption = 'Pop-up!' Font.Charset = DEFAULT_CHARSET Font.Color = clGray Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [fsBold, fsItalic] ParentFont = False end object Label4: TLabel Left = 8 Top = 8 Width = 112 Height = 23 Caption = 'Drive Statistics' Font.Charset = ANSI_CHARSET Font.Color = clBlack Font.Height = -19 Font.Name = 'Arial Narrow' Font.Style = [fsBold] ParentFont = False end object Label8: TLabel Left = 8 Top = 139 Width = 121 Height = 13 Caption = 'Summary for total drives...' end object Label2: TLabel Left = 174 Top = 6 Width = 62 Height = 16 Caption = 'Pop-up!' Font.Charset = DEFAULT_CHARSET Font.Color = clYellow Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [fsBold, fsItalic] ParentFont = False Transparent = True end object Panel4: TPanel Left = 8 Top = 152 Width = 233 Height = 25 Hint = 'Summary, available in Registered version only!' BevelOuter = bvLowered Color = clWindow ParentShowHint = False ShowHint = True TabOrder = 2 object lblTotals: TLabel Left = 8 Top = 6 Width = 222 Height = 13 AutoSize = False end end object RadioButton1: TRadioButton Left = 8 Top = 184 Width = 58 Height = 18 Caption = '&MBytes' Checked = True TabOrder = 3 TabStop = True OnClick = FormShow end object RadioButton2: TRadioButton Left = 8 Top = 200 Width = 58 Height = 18 Caption = '&KBytes' TabOrder = 4 OnClick = FormShow end object BitBtn2: TBitBtn Left = 88 Top = 191 Width = 74 Height = 26 Caption = '&Refresh' TabOrder = 1 OnClick = FormShow Kind = bkRetry end object bbtnOK: TBitBtn Left = 167 Top = 191 Width = 74 Height = 26 Cancel = True Caption = 'OK' Default = True ModalResult = 1 TabOrder = 0 OnClick = AppDeactivate Glyph.Data = { DE010000424DDE01000000000000760000002800000024000000120000000100 0400000000006801000000000000000000001000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333 3333333333333333333333330000333333333333333333333333F33333333333 00003333344333333333333333388F3333333333000033334224333333333333 338338F3333333330000333422224333333333333833338F3333333300003342 222224333333333383333338F3333333000034222A22224333333338F338F333 8F33333300003222A3A2224333333338F3838F338F33333300003A2A333A2224 33333338F83338F338F33333000033A33333A222433333338333338F338F3333 0000333333333A222433333333333338F338F33300003333333333A222433333 333333338F338F33000033333333333A222433333333333338F338F300003333 33333333A222433333333333338F338F00003333333333333A22433333333333 3338F38F000033333333333333A223333333333333338F830000333333333333 333A333333333333333338330000333333333333333333333333333333333333 0000} NumGlyphs = 2 end object ListBox1: TListBox Left = 8 Top = 32 Width = 233 Height = 105 ItemHeight = 17 Style = lbOwnerDrawVariable TabOrder = 5 end end end object PopupMenu1: TPopupMenu Left = 232 object AboutDiskFree: TMenuItem Caption = 'About '#39'DiskFree'#39 OnClick = AboutDiskFreeClick end object Exit1: TMenuItem Caption = 'Exit '#39'DiskFree'#39 OnClick = Exit1Click end end end